home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
045a
/
tpapi1.zip
/
NWFSERV.PA1
< prev
next >
Wrap
Text File
|
1991-12-04
|
3KB
|
69 lines
{!R! FONT 15; FTMD 15; EXIT;}
{***************************************************************************}
{** Program : NWFSERV **}
{***************************************************************************}
{** Version : 1.0b ** Started : 11/11/91 ** ENDed : / / **}
{***************************************************************************}
{******************************** Description ******************************}
{***************************************************************************}
{** OOP library for Netware API **}
{** **}
{** This unit forms the second level object : FSERV **}
{** This object is a descandent of : NETWARE **}
{** **}
{** **}
{** **}
{** **}
{***************************************************************************}
{******************************** Information ******************************}
{***************************************************************************}
{** **}
{** **}
{** **}
{** **}
{** This code is (c) 1991 Tony Covelli, **}
{** Portions (c) Novell Inc, **}
{** **}
{** **}
{***************************************************************************}
{$I NETWARE.INC}
UNIT NWFSERV;
INTERFACE
USES
netware, nwvar;
TYPE
pFServOBJ = ^FServOBJ;
FServOBJ = object (NetwareOBJ)
constructor Init;
FUNCTION EraseFiles (DirectoryHandle : BYTE; DirectoryPath : PathNameType;
SearchAttributes : BYTE) : WORD;
FUNCTION PurgeAllErasedFiles : WORD;
FUNCTION PurgeErasedFiles : WORD;
FUNCTION RestoreErasedFile (DirectoryHandle : BYTE; VolumeName : VolumeNameType;
VAR ErasedFileName, RestoredFileName : FileNameType) : WORD;
FUNCTION ScanFileInformation (DirectoryHandle : BYTE; FilePath : PathNameType; SearchAttributes : BYTE;
VAR SequenceNumber : INTEGER; VAR FileName : FileNameType;
VAR FileAttributes, ExtendedFileAttributes : BYTE; VAR FILESIZE : LONGINT;
VAR CreationDate, LastAccessDate : WORD; VAR LastUpdateDateAndTime,
LastArchiveDateAndTime : LONGINT; VAR FileOwnerID : OT_BinderyID) : WORD;
destructor Done; virtual;
END;